home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 21 / CU Amiga Magazine's Super CD-ROM 21 (1998)(EMAP Images)(GB)[!][issue 1998-04].iso / CUCD / Programming / EasyPLUGINs / examples / icongad_demo.e < prev    next >
Text File  |  1997-12-01  |  625b  |  36 lines
  1. /*
  2.  
  3.   $VER: IconGad Demo V1.00 - By Fabio Rotondo (fsoft@intercom.it)
  4.  
  5.   This source is Public Domain
  6.  
  7.   Part of EasyPLUGINs distribution.
  8.  
  9. */
  10.  
  11. MODULE 'EasyPLUGINs/IconGad', 
  12.        'tools/EasyGUI', 'tools/exceptions'
  13.  
  14. PROC main() HANDLE
  15.   DEF ig=NIL:PTR TO icongad_plugin
  16.  
  17.   NEW ig.init('ram:disk')
  18.  
  19.   easyguiA('Test',
  20.             [ROWS,
  21.               [SBUTTON, 1, 'test'],
  22.               [SPACEV],
  23.               [COLS,
  24.                 [SPACEH],
  25.                 [PLUGIN, {ignore}, ig],
  26.                 [SPACEH]
  27.               ]
  28.             ]
  29.           )
  30. EXCEPT DO
  31.   report_exception()
  32.   END ig
  33. ENDPROC
  34.  
  35. PROC ignore() IS EMPTY
  36.